home *** CD-ROM | disk | FTP | other *** search
/ The PC-SIG Library 10 / The PC-Sig Library - Shareware for the IBM PC and Compatibles (PC-SIG)(Tenth Edition Disks 1-2804)(1991).iso / PC_SIGCD / 25 / 7 / DISK2570.ZIP / CLOCK.BAS < prev    next >
BASIC Source File  |  1991-04-03  |  167b  |  6 lines
  1. 100 print "Press ctrl-shift-b to terminate clock."
  2. 110 suspend 0, 0x30, 0x06, 18, 0, timer
  3. 120 if not timer then cls : end
  4. 130 display 0, 72, time()
  5. 140 goto 110
  6.